Under consideration for publication in J. Functional Programming 


Categorical semantics for arrows 

Bart Jacobs, Chris Heunen, Ichiro Hasuo 

Institute for Computing and Information Sciences 
Radboud University, Nijmegen, the Netherlands 
( e-mail: {b. j acobs, c. heunen, i. hasuo}@cs. ru. nl) 


Abstract 

Arrows are an extension of the well-established notion of a monad in functional program¬ 
ming languages. This article presents several examples and constructions, and develops 
denotational semantics of arrows as monoids in categories of bifunctors C op xC-»C. Ob¬ 
serving similarities to monads - which are monoids in categories of endofunctors C —> C 
- it then considers Eilenberg-Moore and Kleisli constructions for arrows. The latter yields 
Freyd categories, mathematically formulating the folklore claim “arrows are Freyd cate¬ 
gories” . 
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1 Introduction 

The motivation to introduce the concept of an arrow comes from functional pro¬ 
gramming (Hughes, 2000; Paterson, 2001). It is intended as a uniform interface to 
certain types of computations, streamlining the infrastructure. This enables a high 
level of abstraction to uniformly capture for instance quantum computing (Viz- 
zotto et al. , 2006+). It also facilitates language extensions like secure information 
flow (Li & Zdancewic, 2008): instead of building a domain-specific programming 
language from the ground up, it can be defined within normal Haskell using the 
arrow interface. After all, arrows provide an abstract interface supporting famil¬ 
iar programming constructs like composition, conditional branches and iteration. 
Haskell even incorporates convenient syntax to ease the use of such language exten¬ 
sions. The name “arrow” reflects the focus on the provided infrastructure, especially 
compositionality. 1 

Here is a more mathematical intuition. Monoids are probably the most fun¬ 
damental mathematical structures used in computer science. The basic example 
(A,;, skip ) is given by a set A e Set of programs or actions, with sequential com¬ 
position ; as binary operation, and an empty statement skip as neutral element for 
composition. Such a monoid A does not capture input and output. We may like 
to add it via parametrisation A(X,Y), where X,Y are type variables. Since input 
is contravariant and output covariant, we may consider such an indexed monoid 
A(— , +) as a bifunctor C op xC^ Set for a suitable category C of types for input 
and output. But of course, we still want it to have a monoid structure for composi¬ 
tion. Hence we are led to consider monoids in the functor category C op xC^ Set. 
Our first main result - stemming from (Heunen & Jacobs, 2006) - is that such 
monoids are in fact arrows as introduced by Hughes. 

A special case of the above is when there is only output, but no input: these singly 
indexed monoids are (categorical) monads. They correspond to the well-known 
notion of a monad in Haskell (Moggi, 1989; Wadler, 1992). Arrows are thus similar 
to monads in that they are monoids in suitable categories: namely in categories of 
endofunctors C — > C. Hence we are led to ask: what are the Eilenberg-Moore and 
Kleisli constructions - two very basic constructions on monads - for arrows? Our 
second main result - from (Jacobs & Hasuo, 2006) - is that the Kleisli construction 
for arrows corresponds to Freyd categories (Robinson & Power, 1997), and moreover 
the correspondence is isomorphic. Thus, to the folklore claim “arrows are Freyd 
categories” that we put in precise terms, we add the slogan “Freyd is Kleisli, for 
arrows”. 

These main results are streamlined versions of (Heunen & Jacobs, 2006) and 
(Jacobs & Hasuo, 2006). The current article proceeds as follows. In Section 2 we 
introduce the concepts of monads and arrows in Haskell more thoroughly, gradually 
moving towards a more mathematical mindset instead of a functional programming 
perspective. We also motivate why one can in fact achieve more with arrows than 


In a categorical context, the name is a bit unfortunate, however. We consistenly use “arrow” 
for the programming construct and “morphism” for the categorical notion. 
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with monads, and give settings where this is useful. Section 3 investigates, still in 
a somewhat discursive style, combinations of arrows. It leads up to a deconstruc¬ 
tion into elementary parts of the particular program that motivated Hughes to use 
arrows in the first place (Swierstra & Duponcheel, 1996). The formal, categorical, 
analysis of arrows takes place in Section 4, culminating in our first main result 
mentioned above, Corollary 4.1. An example showing the elegance of this approach 
is discussed in Section 5, namely arrows facilitating bidirectional computation. Sec¬ 
tion 6 then considers algebra constructions for arrows, and contains the second 
main result, Theorem 6.2. We conclude in section 7. Appendix A contains a proof 
of a result used in Section 4 but only sketched there. Next, Appendix B considers 
a bicategorical characterisation of the notion of arrow that elegantly exemplifies its 
naturality, but is somewhat out of the scope of the main line of this article. Finally, 
Appendix C gives the missing details of Section 6. 


2 Haskell examples 

This section introduces arrows and their use in functional programming languages. 
We briefly consider monads first in subsection 2.1, since this construction from 
category theory historically paved the way for arrows (subsection 2.2). Subsection 
2.3 then consider the advantages of arrows over monads. 

2.1 Monads 

A major reason for the initial reluctance to adopt functional programming languages 
is the need to pass state data around explicitly. Monadic programming provides an 
answer to this inconvenience (Moggi, 1989; Wadler, 1992). Through the use of a 
monad one can encapsulate the changes to the state data, the “side-effects”, with¬ 
out explicitly carrying states around, monads can efficiently structure functional 
programs while improving genericity. This mechanism is even deemed important 
enough to be incorporated into Haskell syntax (Peyton Jones, 2003). A monad in 
Haskell is defined as a so-called type class: 
class Monad M where 

return :: X —> M X 

(»=) :: MX^(X^MY)-*MY 

To ensure the desired behaviour, the programmer herself should prove certain 
monad laws about the operations return and »= (pronounced bind). These boil 
down to the axioms that M be a monad, in the categorical sense. Using the for¬ 
mulation that is standard in the functional programming community, a categorical 
monad consist of a mapping X i-> M(X) on types, together with “return” and 
“bind” functions 

X n >M X. (X MY ) —^4 {MX -> MY) 

satisfying 

bd(/) o rt = /, bd(rt) = id, bd(/) o bd(g) = bd(bd(/) o g). 
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In categorical style one defines M to be a functor, with multiplication maps /i = 
bd(idMx) : M 2 X —* MX satisfying suitable laws. The above equations are more 
convenient for equational reasoning. Often one writes u >>= f for bd(/)(«). 

The most familiar monads are powerset, list, lift, state and distribution: 

V rt(®) = M bd(/)(a) = U{/(*) I * € a} 

(-)* rt(x) = (x) bd(/)((xi,..., x n )) = f{x{) •... • f(x n ) 

1 + (-) rt(x) = up(s) bd(/)(«) = | ^ ^ ^ 

(— x S) s rt(x) = As. (x, s) bd(/)(/i) = As. f(nih(s)) fah (s)) 

V rt(x) = Xy. j* V y bd(f)(<p) = 

In the latter case we write V for the ‘subdistribution’ monad V(X) = {ip: X —> 
[0,1] | supp(^) is finite and J2 X i p( x ) — 1}) where the support supp(tp) is the set of 
x e X with tp(x) > 0. 

Monads are often considered with strength, i.e. come equipped with a suitable 
natural transformation st : M(X) x Y —> M(X x Y). For later reference, we use 
that in our present informal setting each functor M is strong, as its strength can 
be described explicitly as: 

st(u,y) = M(\x.(x,y))(u). (1) 

It satisfies the following basic equations. 

M(f x 5) o st = st o (M(f) x g), 

M( 7Tl) o st = 7T1, 

M(a _1 ) o st = st o (st x id) o a -1 , 

where we use 

in : X! x X 2 -> X it a : (X xY) x Z X x (Y x Z), 

for the familiar product maps fst, snd and assoc. 

In other, non-set-theoretic settings one may have to require such strength maps 
explicitly. The monad operations interact appropriately with the above strength 
map, in the sense that the following equations hold. 

st o (rt x id) = rt st o (bd(/) x g) = bd(st o / x g) o st. 

In effect, monads are thus functional combinators. They enable the combination 
of functions very generally, without many assumptions on the precise functions to 
combine. However, these restrictions are severe enough to exclude certain classes of 
libraries from implementation with a monadic interface. 


2.2 Arrows 

Arrows are even more general functional combinators, and can be seen as a gener¬ 
alisation of monads (Hughes, 2000; Hughes, 2005). An arrow in Haskell is a type 
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class of the form 

class Arrow A where 

{X -► Y) -> A X Y 
AXY->AYZ^AXZ 
A X Y A (X, Z) (Y, Z) 

where X, Z in Haskell denotes the Cartesian product type X x Y. Analogous to 
monads, an arrow must furthermore satisfy the following arrow laws, the proof of 
which is up to the programmer. 

a ;$>> (b ;$>> c), (2) 

arr f »> arr g, (3) 

a = a^>arr id, (4) 

arr wj a, (5) 

arr (id x /) ;$>> first a, (6) 

arr a ;§§> first a, (7) 

arr (/ x id), (8) 

first a ;§§> first b, (9) 

In fact, as Section 6.1 shows, less structure than Cartesian products suffices, elimi¬ 
nating the need for projections 7r, in the above arrow laws. Sometimes, arr(id x /) 
is written as second(arr(f)), where 

second(a) = arr(j) ;§§> first(a) arr( 7), 

and 7 : X x Y Y x X is the well-known swap-map. The arrow laws (2)-(9) 
are sometimes given names (Paterson, 2003). Especially noteworthy are the names 
“exchange” for (6) and “extension” for (8). 

Example of arrows will be given in Section 3. 


(a ys$> b) c = 
arr (gof) = 
arr id a = 
first a ;$>> arr 7Ti = 
first a ;$>> arr (id x /) = 
first (first a) ^> arr a = 
first (arr f) = 
first (a b ) = 


(»>) 

first 


2.3 Monads versus arrows 

This article is concerned with a categorical understanding of this notion of arrow. 
At this stage we shall reveal some of the structure involved, but are deliberately 
a bit vague about the general setting in which we are working. In doing so we 
move to a more mathematical notation, for instance writing A(X,Y) for AX Y in 
functional style. 

It is not hard to show that an arrow is “bifunctorial” (Lemma 4.1). This means 
that for / : X' -► A and g : Y -► Y' one also has a map A(X,Y) -» A{X',Y'). 
The maps arr : Y x —> A(X, Y) then form natural transformations (Lemma 4.2). 
Even more, composition can also be seen as a natural transformation A <g> A —> A, 
for a suitable tensor product 0 of bifunctors (Proposition 4.2). In this way one 
can describe the triple (A, arr, »>) as a monoid in a category of bifunctors. Here 
we shall not need these details yet. But in the remainder of this section we shall 
introduce arrows as bifunctors of the form C op xC-t Set. 



Jacobs, Heunen, Hasuo 


Here is a first trivial example. Let (P, to, e) be a monoid, consisting of an asso¬ 
ciative operation m : P x P —> P with two-sided unit e: P. It yields probably the 
most elementary example of an arrow, namely a constant one. We shall also write 
it as P, formally as functor in P(X, Y ) = P, with operations: 

arr(f) = e, a b = m(a, b) first(a) = a. 

Standard examples of monoids P are the singleton type 1 (with trivial operations), 
the type 2 = {0,1} of truth values or Booleans (with either conjunctions T, A or 
disjunctions _L, V), or the type X* of lists of an arbitrary type X (with the empty 
list () and concatenation •). 

Every monad (M, rt,bd) with a strength gives rise to an arrow M by 

M(X,Y) = M(Y ) X , (10) 

with obvious operations (see e.g. Hughes, 2000) - strength is used to provide the 
operation first. 

Dual to a monad, a comonad is given by a mapping X i—> N(X) with “coreturn” 
and “cobind” operations crt : NX -> X and cbd : (NX —> Y) —*■ (NX -► NY) 
satisfying 

crt o cbd(/) = /, cbd(crt) = id, cbd(/) o cbd(g) = cbd(/ o cbd(<?)). 

It gives rise to an arrow by (X, Y) i—> Y N(X ) _ no strength is needed. 

Comonads are less well-known, but are fundamental structures for handling con¬ 
texts (among other things), in which the “counit” e = crt : NX —> X is used for 
weakening, and the “comultiplication” 6 = cbd(idjvx) : NX —► N 2 X for contrac¬ 
tion (Jacobs, 1999). The following diagram presents the main comonads I h ••• 
for handling streams with discrete time input (Uustalu k. Vene, 2005). 

x* x — xN x » x n ( n ) 

((a(0),..., a(n — l)).q(l |jp i ]f Th ii ■iriffifl n) f . a(n + to) 

The intuition for a pair (a, n) £ X N x N is that n represents the present stage in the 
stream a = (a(0), a(l ),..., a(n — 1), a(n),a(n + 1),...), where everything before 
n is past input, and everything after n is future input. The two morphisms in the 
previous diagram are homomorphisms of comonads, commuting with the relevant 
comonad/context structure. There is a similar real-time analogue. 

A strong monad M and a comonad N can also be combined to form arrows. 
As illustrated for instance in (Uustalu & Vene, 2005; Heunen & Jacobs, 2006), 
this happens via a so-called distributive law NM => MN that commutes with the 
(co)monad operations. Then one can define an arrow (M, N) via 

Ijggf X, Y) = M(Y) n ^ x \ (12) 

It combines the previous two constructions with monads and comonads separately. 

This mapping (X, Y) i—> M(Y ) N ^ X ) leads to an appealing picture of an arrow in 
which the monad M is used for structuring the outputs and the comonad N for 
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the inputs. But arrows are more general than this. For instance, if we wish to do 
“non-deterministic dataflow” we may consider at first maps of the form 

X n xN — >V(Y), (13) 

with the comonad on the left-hand side structuring the input of streams, and the 
monad on the right-hand-side producing non-deterministic output. However, this 
requires a distributive law of the form 

V(Xf x N —♦ P(X N x N). 

While it is possible to construct such a function - for instance the power law 
from (Jacobs, 2006) - it does not commute with the comonad structure. As a 
result, composition is not associative. 

The way out is to realise that co-Kleisli maps X K xN^7 correspond to maps 
X N —> y N via Currying. But then non-determinism can be introduced easily into 
dataflow, namely by looking at maps 

x N —* p(y N ) (14) 

instead of maps (13). The corresponding assignment (X, Y) i—> , p(y N )( x ) in¬ 
deed forms an arrow - with associative composition. It is however not of the form 
(X,Y) i—► M(Y) n( ' X K Arrows thus have more to offer than monad-comonad com¬ 
binations. As an aside: it is not so clear how to combine the other comonads in (11) 
with non-determinism. 


3 Arrow constructions and examples 

This section continues in the discursive style of the previous one. It introduces 
several elementary ways to combine arrows, and use these constructions to obtain 
some well-known examples. The first construction is obvious, but useful. Its proof 
is straightforward and left to the reader. 


Lemma 3.1 

Let (A-|, arr-|, 5>S>i) and (A 2 , arr 2 ■ >^ 2 ) be arrows. Then so is their product A = 
Ai x A 2 , described by 

A(X, Y) = A x {X, Y) x A 2 (X, Y) 

with operations 


arr(f) = (am(/), arr 2 (/)} 

(01, af) (61,62) = (ui 61, o 2 b 2) 

first((a,b)) = (first^a), first 2 (b)). □ 

The next result now follows from the observation in the previous section that 
each monoid forms a (constant) arrow. The result is mentioned explicitly because 
it will be used later in this form, in Example 3.1. 


Corollary 3.1 
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Let {A, arr, >s$>) be an arrow, and (P, to, e) be a monoid. Then A' = P x A, given 
by 

A'(X,Y) = (P x A)(X,Y) = P x (A(X,Y)), 
is again an arrow, with the following operations. 

arr'(f) = (e,arr(f )} 

{x, a) ;$>>' (y, b) = (m(x, y), a 6} 
first'((x,a)) = (x, first(a)). □ 

For the next result we consider functors F that preserve products. This means 
that the obvious maps 

F(X x §|f (F(7ri) ' F( g , F (x) x F(Y) 

are isomorphisms. In that case we shall write p = 0x,y : F(X') x F(Y') —> P(X x T) 
for the inverse. 

Lemma 3.2 

Let (A, arr, 5S4>) be an arrow, and F be a product preserving functor. Defining 
A f (X,Y)=A(F(X),F(Y)), 
yields a new arrow Ap with the following operations. 
arr'(f) = arr(F(f)) 
a ;$>>' b= ay»b 

first'(a) = arr((P(7ri), P(7T2))) first(a) 5$S> arr(P). 

Proof 

Checking the relevant equations is not hard. For instance: 
first'(a b) 

= arr((P(7Ti), P(7T2)}) first(a b) ^> arr(P) 

= arr((P(7Ti), P(7r 2 ))) first(a) first(b) 584> arr(p) 

= arr((P(7Ti), P(7r 2 )}) 5$s> first(a) arr((P(7ri), P(7r 2 )) o pi) 

m>first(b) > arr(p) 

= arr((F( tti), P(tt 2 ))) »> first(a) »> arr(P) 

i^>arr{{F{-K\), Ffnf))) first(b) ;$§> arr(P) 

= first' (a) first' (b). □ 

Lemma 3.3 

Let (A, arr, >») be an arrow and S an arbitrary type. The definition 
,4sx(^,F) = yL(SxX,Sxy) 
again yields an arrow, with corresponding structure: 

arr Sx (f ) = arr(id s x /) 
a y»sx b = ay»b 

firstsx(a ) = arr(a~ 1 ) first(a) arr(a) 
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where a is the associativity isomorphism for products from Subsection 2.1. □ 

This particular construction Ag x occurs, in a slightly different formulation, al¬ 
ready in (Hughes, 2000, §§9) where it is introduced via a ‘state functor’. A similar 
construction (X,Y) i—> A(X, S) A<v - s ) i s defined there for special arrows with suit¬ 
able apply operations A(A(X, Y) x X.Y). 

At this stage we can already see how one of the motivating examples for the 
notion of arrow can be obtained from the previous constructions. 

Example 3.1 

In (Hughes, 2000, §§4.2) an arrow SD is introduced to describe a special parser 
defined by (Swierstra & Duponcheel, 1996). This arrow can be described as 

SD(X, Y) = (2 x 5*) x (1 + 5* x y) (s * xX) . (15) 

We show that this arrow SD can be obtained by successive application of the 
constructions in this section. 

First, the set 2x5*- with 2 = (0,1} - is used as monoid, not with the standard 
structure, but with unit and composition given by: 

e=(M» 

m((b,a), (c,t)) = (b A c, a ■ (if b = 1 then r else ())). 

It is not hard to see that this yields a monoid. Corollary 3.1 then tells that (15) 
is an arrow if the rightmost part (X, Y) (-*■ (l + 5* x Y) <S xX> is. Using the lift 
monad 1 + (—) we get an arrow (X, Y) i-> (1 + Y) x , as shown in subsection 2.3. By 
applying Corollary 3.3 with set 5* we obtain the rightmost part, as required. 

When we go into the details of these constructions we can also reconstruct the 
associated operations of the arrow (15) as follows. 

arr(f) 

-- ((1,0). \(8,x)eS*xX.up(s,f(x))) 

(( b,a),f))»>((c,r),g) 

= ((b A c, a ■ (if b = 1 then r else ())), 

AMe5‘xr( i if/(s,a:) = -L 

{ g(t,y) if f(s,x) = up(f,y) ) 

first(((b,cr), /)) 

= ((M), 

. , , ,, f 1 iff(s,x) = T 

A(s, {x,y)) e 5* x (X x Y). < ) 

l up (t,{z,y)) if f(s,x) = wp(t,z) ). 

These operations are precisely as described (in Haskell notation) in (Hughes, 2000, 
§§4-2). 

Example 3.2 

Quantum computing (Vizzotto et al., 2006+) can be modelled within a functional 
programming language. The states of a quantum program are so-called density 
matrices, that we can understand as elements of the monad application D(X) x to 
some set X. These states evolve into each other by superoperators, which can be 
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modelled as arrows ( X , Y) i—> D(Y x yj( XxX ). The previous lemmas also enable us 
to show that this quantum computation arrow is indeed an arrow, by decomposing 
it into elementary parts, without checking the arrow laws by hand. 

First, recall that the mapping (X, Y) i—> T>(Y) X yields an arrow, induced by the 
distribution monad V. Next, notice that the diagonal functor IhIxI preserves 
products, so that the mapping (X,Y) M> (Y x Y) (XxX ) yields an arrow, with 

first(a) = \((x,z),(x',z')) G (X x Z) x (X x Z) .((TTia(x,x'),z),(Tr 2 a(x,x'),z')) 


for given a: X x X ^Y xY, 

Thus, according to Lemma 3.2, the mapping (X,Y) i-> V(Y x Y)( XxX ^ is an 
arrow. If we follow through the construction, we obtain the following arrow opera¬ 
tions. 


arr(f) 

ay$>b 


first(a) 


rt o (/ x /) 

A(x,a; , ).A(y,t/ , )-| J 

bd(6) o a 


if f(x) = y A fix') = y' 
otherwise 


Mx, x') • X(z, z'). Y a(x,x'){y,y') ■ b(y,y'){z, z') 

(y,y‘) 

T>({ 7Ti X 7ri,7T2 X 7T 2 )) O st O (a X id) o (7T1 X 7Ti,7r 2 X 7T 2 ) 
[ a{x, x')(y, y') 

\{{x, Zi), {x', z[)). A i(y, z 2 ), (y', z' 2 )). | 


if zi = z 2 
and z[ = z' 2 , 
otherwise. 


These indeed coincide exactly with the ones given in (Vizzotto et a,l, 2006+). 


4 Categorical formulation 

In this section we shall move towards a categorical formulation of the notion of 
arrow. We shall do so by first analysing the structure in a Haskell-like setting. We 
denote by HT the category with Haskell types as objects. A morphism <r —» r in 
this category is a Haskell function f = Xx : a. fix) : r taking input in a to output 
in r. Composition of such maps is performed by substitution. Essentially, this is a 
Cartesian closed category of types and terms, but for the fact that some functions do 
not terminate, much like a lambda calculus. Of course there is much more structure 
(like general recursion) in Haskell than the types with type variables and terms, like 
in system F. Below we shall analyse the behaviour of Haskell arrows as bifunctors 
on HT, leading to a more general definition of an arrow over any category C. 

4.1 Analysing arrow behaviour categorically 
First and foremost, let us show that a Haskell arrow is indeed bifunctorial. 

Lemma 4-1 

The operation A(—, —) extends to a functor HT op x HT —* Set by 
(X, Y) 1—> {a : A{X, Y) \ a closed term}, 
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whose action A(f,g) : A(X,Y) —* A(X',Y') on maps / : X' —> X and g :Y —>Y' 
is given by 

A(f, g) = Xa. arr(f) a arr(g). 

Proof 

Using equations (2), (3) and (4) one easily derives the functorial properties for 
identity, A(id, id) = id, and composition, A(f o /', g' o g) = A(f',g') o A(f, g). □ 


We now examine the arrow operations arr and first in the light of the bifunc- 
toriality of A. 


Lemma f.2 

The maps arr : HT(J, Y) — > A(X, Y) form a natural transformation HT(—, +) => 
A(— ,+) from exponents to arrows, where HT(— ,+) is the homset functor. 

Similarly, the maps first: A(X, Y) —> A(X x Z,Y x Z) are natural in X and Y. 
This may be formulated as: first yields a natural transformation (first) from A 
to the functor Ax given by (X, Y) i—> ]J Z A(X x Z,Y x Z). Of course, this functor 
Ax only makes sense in a small category with arbitrary (set-indexed) products II. 


Proof 

For maps / : X' X, g : Y -+ Y' in HT and h : HT(I, Y) we have 
(A(f, g) o arr ) ( h ) = arr(f) arr(h) arr(g) 

= arr(g oho f) = arr(g f (h)) = (arrogf)(h), 

and 


(Tx (f,g) o (first))(a) = (A(f x id ,g x id) o n z )z((first(a))) 

= (A(f x id, g x id )(first(a))) 

= (arr(f x id) first(a) ^> arr(g x id)) 

— (first(arr(f)) ^>> first(a) first(arr(g))) 

(9) 

= ( first(arr(f ) ^>> a ^> arr(g))) 

= (first(A(f,g)(a))) 

= ((first) oA(f,g))(a). □ 

The next lemma shows that the maps : A(X, P ) x A(P, Y) —> A(X, Y) are 
natural in X and Y, just like the maps arr and first in the previous lemma. In 
the parameter P they are what is called dinatural (Mac Lane, 1971, Section IX.4). 
This means that for each map / : P —> Q the following diagram commutes. 


A(X, P ) x A(P, Y) - 


F A(X, Y) 


A(X, P) x A(Q,Y) 


A(X, Y) 
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Lemma 4-3 

The maps ;§§> : A(X, P) x A{P. Y) —» A(X. Y) are natural in X and Y, and 
dinatural in P. 

Proof 

Naturality is trivial. As for dinaturality, for a : A(X, P) and b : A(Q, Y), we have 
( »> o (id x A(f, id))) (a, 6) = a »> A(f,id)(b) 

= a arr(f) b 
= A(id, f)(a) b 
= (»>o(A(id,/) xid))(o,6). □ 

Intuitively, dinaturality in P signifies that 5SS> is parametric in its middle argu¬ 
ment type, and that this middle parameter is auxiliary; it could just have well been 
another one, as long as it is the same across the second argument of the first factor, 
and the first argument of the second. 


4-2 Monoidal structure in the ambient category 

Extending from the category HT of (Haskell) types and terms, we would like to 
define an arrow over any suitable category C as a monoid in the functor cate¬ 
gory Cat(C op x C,Set) of bifunctors that carries an internal strength. However, 
to do so we need to ensure that the ambient category, Cat(C op x C,Set), has 
monoidal structure. The most elegant way to achieve this is to employ the no¬ 
tion of (parametrized) coends, see Appendix A. This approach generalises to the 
V-enriched situation, when an arrow is a suitable bifunctor C op x C —> V. Such 
enrichment is necessary if we are to consider (instead of HT) a categorical model 
of Haskell which is most probably Cpo-enriched. At this stage we shall present the 
construction for the reasonably concrete case where V = Set, mostly to give some 
intuition about the monoidal structure. 

Proposition 4-1 

Let C be a small category. Then the category Cat(C op x C,Set) of Set-valued 
bifunctors has a monoidal structure with unit I and tensor product (g>. 

Proof 

The naturality of TTT( -,.-f) =>■ A(— ,+) observed in Lemma 4.2 suggests that the 
(internal) homfunctor could serve as the unit of the intended monoidal structure 
on Cat(C op x C, Set). Thus we define I : C op x C —> Set to be Home; explicitly, 
I(X, Y) = C{X, Y) and /(/, g) = g* = Xh. g o h o f. This requires C to be locally 
small. 

The main idea now is to let the monoidal product of two bifunctors A, B : C op x 
C —> Set be the smallest type containing all bifunctors that behave dinaturally in 
the middle parameter. More explicitly, composition is a collection of morphisms 

A(X,P) x A(P,Y)^fA(X,Y), 
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which can be combined, using the (arbitrary set-indexed) coproduct in Set, into 
one natural transformation with the following component at X , Y £ C. 

( IIp e c A (X, P ) x A(P, Yf Y) 

This requires C to have a (small) set of objects. We take the dinaturality of Lemma 
4.3 into account by defining the components of the monoidal product i®Bas the 
coequalizer c 

A(X,P) \ ( \ 

U xc ( p,Q) n 

>,Qec xB(P,Y)J ^ \Pec *Wd)/ 

of (obvious cotuples of) the morphisms (in Set) 

di = A (a, /). A(id, f)(a) : A(X, P ) x C(P, Q) A(W, Q), 
d 2 = A(/, 6) . B(/, id) (6) : C(P,Q) x B(Q,Y) - B(P,y), 

for all P, Q £ C. The composition maps ^>> then reappear as the components of 
the unique A<& A=> A from the coequalizer. □ 

Remark 

The situation sketched in the previous proposition and proof is that of profunctors, 
which are also known as distributors or bimodules (Benabou, 2000). Profunctors 
and natural transformations form a bicategory Prof, which is a well-studied gener¬ 
alisation of the category of sets and relations. The monoidal structure of Prof (as 
described above) is well-known. The basic idea is that composition of profunctors, 
and hence the tensor product in the above proposition, can also be written in terms 
of standard functor composition using left Kan extension along the Yoneda embed¬ 
ding. See (Day, 1970) for the original account, or (Borceux, 1994, Section 7.8) for 
a modern record. 

The previous lemma puts us in a position to make precise our intuition that 
arrow laws (2)-(4) resemble monoid equations. 

Proposition f.2 

An instantiation of the Haskell arrow class (A ® A) A AT. / satisfying (2)-(4) is 
a monoid in the category Cat(HT op x HT, Set) of bifunctors HT op x HT —> Set. 

Proof 

We have to check that the monoid equations hold for the span (A (g» A) A AA /. 

Here we exhibit one of the equations, namely 

A 


A 0 I r > A 0 A 
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which for a : A(X, Y ) becomes 

jg^i—ss ^id) i-> (a, orr(id)) 

I 

a 5S4> arr (id). 

Hence commutation of this diagram amounts to arrow law (4), which states that 
a ;$>> arr(id) = a. □ 

Remark 

Although the proof of Proposition 4.1 requires a restriction to small categories, we 
will often relax this to locally small categories. We are only after A® A anyway, and 
indeed, in the construction of A ® A above we used a large coproduct for clarity, 
where we could have formulated the composition operation ^>> of A via collections 
of maps A(X, P) x A(P, Y) —> A(X, Y) that are natural in X, Y, dinatural in P 
and satisfy the arrow equations (2)-(9). 

In this way one could include domain theoretic models that are standardly used 
for Haskell semantics. 


4-3 Internal strength 

Now that we have seen that arrow laws (2)-(4) correspond to the monoid equations 
on the semantical side, we investigate the remaining laws (5)-(9) concerning first 
in more detail. 

Recall that a monad T : C —* C on a monoidal category C is called strong when 
there is a natural transformation “strength” with components stx,y : T(X') Q Y —> 
T(X <g> Y) that satisfies suitable coherence conditions. This section shows that the 
availability of the function first is equivalent to an analogous form of strength for 
bifunctors, that we call internal strength. Its emergence is motivated in Appendix B. 

Definition f.l 

Let C be a category with finite products. The carrier A : C op x C — > Set of a 
monoid (A,^$>,arr) in Cat(C op x C,Set) is said to carry an internal strength 
natural transformation with components istx.y ; A(X, Y) —> A(X, Y x X) if these 
satisfy 

ist(arr(/)) = arr((f, id}), (16) 

ist(a) arr(7Ti) = a, (17) 

ist (a >SS> b) = ist (a) ist(arr(7ri) ;$$> b) ;$>> arr(id x 772), (18) 

ist (ist (a)) = ist (a) arr((id,7r 2 }). (19) 

Using the techniques of Appendix A this can again be extended to bifunctors 
A : C op x C —> V for a category C with finite products and a suitable category V. 

The following proposition shows that having internal strength is in fact equivalent 
to having a first operation for arrows - as originally introduced by Hughes. 


Proposition 4-3 
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Let (A,^i$>,arr) be an instantiation of the Haskell arrow class satisfying (2)-(4). 
The maps first: A(X, Y) —> A(X x Z,Y x Z) satisfying equations (5)-(9) corre¬ 
spond to maps ist : A(X, Y) —> A(X. Y x X) which are natural in Y and dinatural 
in X, and satisfy (16)-(19). 

Proof 

The proof of the equivalence of first and ist involves many basic calculations, of 
which we only present a few exemplaric cases. 

Given maps first satisfying (5)-(9), define internal strength on a : A(X,Y) as 

ist (a) = arr( A) ;$$> first(a), 

where A = (id, id). One then checks naturality in Y, dinaturality in X, and (16)p’ 
(19). The (di)naturality equations can be formulated as: 

ist (a) arr(g x id) = ist (a arr(g)) (20) 

arr(f) ist (a) = ist (arr(f) ;$$> a) arr (id x /). (21) 

By way of illustration we check equation (17): 

ist (a) ;$>> arr(ni) = arr (A) ;$?> first(a) arr(iri) 

= arr (A) ;$>> arr( nf) ;$$> a 

= arr(7ri o A) a 

= arr(id) a 

(4) 

= a. 

Conversely, given internal strength maps ist satisfying (16)-(19), define: 

first(a ) = ist (arr (7Ti) a) ;§$> arr (id x 772), 

where 7 Ti : X x Z —> X and id x tt 2 : Y x (X x Z) —> Y x Z. This yields a natural 
operation, in the sense that: 

arr(f x id) ;$?> first{a) ^> arr(g x id) = first(f a 55$> g). 

We shall prove equation (9) in detail, and leave the rest to the interested reader. 
first{a) ;$>> first(b) 

= ist (arr (771) a) ;$>> arr(id x 772) ist (arr (7ri) 5S$> b ) 
arr (id x 772) 

(dmat) j st ^ arr ^ 7I - 1 ^ i s t(arr(id x 7r 2 ) arrfyi) 5S4> b) 

^§>arr(id x (id x 7r 2 )) arr(id x 7r 2 ) 

= ist (arr (771) a) ^>> ist(arr(7Ti) b) 

^§>arr(id x -k^) arr(id x 772) 

^ ist (arr (771) a 554> b) 55§> arr(id x 772) 

= first (a 5S$> b). □ 


The alternative formulation in terms of internal strength ist in the previous 
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Proposition is convenient because its (di)naturality is clearly described, and it has 
only two parameters, whereas first has three. 


4-4 The categorical definition 

After the preparations of section 4.2 we know that an arrow A satisfying arrow 
laws (2)-(4) is precisely a monoid in the category of bifunctors HT op x HT —> Set. 
Furthermore, section 4.3 showed that arrow laws (5)-(9) correspond precisely to 
this monoid having internal strength. Since both notions have been defined more 
generally than just for the Haskell category HT, we can now lift these properties 
into our main definition. 

Definition 4-2 

Let C be a small category with finite products. An arrow over C is a monoid in 
Cat(C op x C, Set) whose carrier has an internal strength. 

In Appendix A we extend the definition of arrow to bifunctors C op x C —» V, 
where C is V-enriched and both categories satisfy suitable size restrictions. 

The combination of Propositions 4.2 and 4.3 justifies this categorical definition 
by showing that in the small category HT of Haskell types and functions our 
categorical notion of arrows coincides with the conventional one. Let us record this 
formally. 

Corollary 4-1 

An instantiation (A, ^$>>, arr, first ) of the Haskell arrow class is an arrow over HT 
in the sense of Definition 4.2. □ 

Summarising, we have shown that arrows in a type theoretic setting coincide with 
monoids in the category of bifunctors HT op x HT — > Set with internal strength. 
We then lifted this property to a definition of arrow on any suitable category of 
bifunctors C op x C —> V, of which we described the case V = Set explicitly. 


5 Biarrows 

The aim of this section is to illustrate that our categorical semantics for Haskell 
arrows is at the right level of abstraction. We consider the example of so-called biar¬ 
rows, the semantics of which can now be elegantly expressed by simply restricting 
the underlying category. 

Biarrows were introduced in (Alimarine et al., 2005) as a language extension 
facilitating bidirectional computations. For example, implementing a parser as a 
biarrow begets a pretty-printer “for free”. In Haskell terms, a biarrow is a further 
restriction of the arrow class interface: 


class Arrow B => BiArrow B where 

(<->) :: (X —> Y) —> (Y —> X) —> B X Y 

inv :: B XY -► BY X 
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satisfying (2), (5), (7), (9), and 

(A <-*■ 92 ) »> (5i J2) = (fi »> 9i) {h »> 92 ), (3’) 

(id <- id) »>/ = /= / »> (id <-+ id) (4’) 

first(h) y>$> (id x /) <-> (id x j) = (id x /) <-> (id x <7) first(h) (6’) 
first(f *-* g) = (/ x id) <-► (5 x id) (8’) 

inv(inv(f)) = / (22) 

inv(f ;§§> 5) = inv(g) inv(f) (23) 

inv(f <-> 5) = g f (24) 

inv(first(f )) = first(inv(f)) (25) 

We see that biarrows require a further operation inv on top of arr, and first, 


whose type should be inv : B(X, Y) —> B(Y, X). Since we defined an arrow as a bi¬ 
functor of the form B : C op x C —> V, a natural transformation B(X, Y) — B(Y, X) 
is a problem because of the co- versus contravariance. The following definition en¬ 
forces the required symmetry C = C op . 

Definition 5.1 

For C a category, define a full subcategory of C op x C by the class of objects 
{(W, X) : X e C}. We identify the objects of C±^ and C, so that a morphism 
X —> Y in Ct? is a pairs of morphisms X —>Y and Y —> X of C. 

The category is self-dual by construction. It has finite products if and only if 
C has finite biproducts - which, for this situation, are finite products and coprod¬ 
ucts that coincide. 

Definition 5.2 

A biarrow on C is defined to be an arrow B on C±- that is equipped with a 
natural transformation inv : B => B* where B* : C2? x Ct- —> Set is given by 
B*(X,Y) = B(Y, X) and ((g, /), (h, k)} i-> ((/, g), {k, h)}. The components invx,Y ’■ 
B(X,Y) —* B{Y,X) are required to satisfy: 

inv o inv = id (26) 

inv o 07= ;>§> o (inv x inv ) (27) 

inv o arr = arr o 7 (28) 

inv o first = first o inv (29) 

A biarrow B is called left-invertible on fee B(X,Y) if b inv(b) = idx- It is 
called right-invertible on b if inv(b) b = idy, and invertible if it is both left- and 
right-invertible. 

Notice that the domain of the operation arr : C±^(X. Y) —> B(X, Y) of a biarrow 
B is C(X. Y) x C (Y,X). Hence one can model the operation (<->) simply by the 
unit arr of the monoidal structure of a biarrow. 

Let us conclude this section by studying under which conditions the examples of 
Section 2.3 are (invertible) biarrows. 
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Proposition 5.1 

The arrow C'T x C<^ —> Set of pure functions, given by B(X,Y) = C(X, Y) x 
C(y, X), is a biarrow. On morphisms it is given by: 

(*' k 1 - b ) € B(X, Y).(hoaog,fobok) 

It is left-invertible on (the subcategories of C<^ of) split monies, right-invertible 
on split epis, and invertible on isomorphisms. 

Proof 

Use the “swap” map (a, b) i—> (6, a) as the natural transformation inv. Since this 
is in fact a natural isomorphism, (26)-(29) are trivially satisfied. Left-invertibility 
on a morphism b £ B(X,Y) means precisely that its components bi : X —> Y and 
62 : Y —> X satisfy 62 ° b-\ = idx, proving the claim that b\ be split mono. The 
claim on split epis is similar, and a morphism that is split mono as well as split epi 
is necessarily an isomorphism. □ 

In the style of Section 3, one may proceed to formulate a calculus of biarrows. In 
this way one may structurally develop programs together with their “inverses”, as 
in (Alimarine et al, 2005). 


6 Kleisli and Eilenberg-Moore constructions for arrows 

In Section 4 we have observed that arrows are monoids in a category of bifunctors 
C op xC -> V, where C is V-enriched. This perspective bears a resemblance to mon¬ 
ads. After all, monads are also monoids in a functor category, namely Cat(C, C). 
Pursuing this analogy, this section investigates Eilenberg-Moore and Kleisli con¬ 
structions for arrows. 

We should warn the reader that this section requires a stronger stomach for 
technical/categorical details. For clarity of exposition, we focus on a non-enriched 
setting throughout this section, i.e. V = Set. Enriching the whole framework in a 
monoidal closed category V (following Appendix A) is then straightforward. Con¬ 
cretely, this means that the results in this section will be needlessly restricted to 
locally small categories. 


6.1 Arrows are Freyd categories 

Let us start by exhibiting an obvious way to associate a category of “(structured) 
computations” with an arrow. This construction will subsequently be shown to 

• give Freyd categories (Robinson & Power, 1997; Power & Thielecke, 1997); 

• provide a bijective correspondence between arrows and Freyd categories, ad¬ 
hering to the slogan “arrows are Freyd categories” (Heunen & Jacobs, 2006); 

• be the Kleisli construction for arrows, in a suitable 2-categorical sense, under 
the motto “Freyd is Kleisli, for arrows” (Jacobs & Hasuo, 2006). 

Definition 6.1 (The category Ca) 
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Let A : C op xC-t Set be an arrow, with operations arr, '»> and first. Define a 
category C a to have objects those of C, and morphisms X —* Y given by elements 
of the set A(X,Y). Identities and composition are given by arr and ;$>> in the 
obvious manner. 

Before proceeding to explain why this construction gives Freyd categories in 
Theorem 6.1 below, let us briefly summarize what a Freyd category is. For that, 
we need the notion of a premonoidal category, which can intuitively be thought of 
as a monoidal category in which the tensor need not be a bifunctor, though it is 
functorial in each variable separately. 

Definition 6.2 

A binoidal category is a category D, with for every object X two functors (—) k X : 
D —» D and X xi (—) : D — > D such that X k Y = X xi Y. Hence we write 
X IEI Y = XxY = I x Y. A morphism / is called central if for each g. both 

• (/ x id) ° (id xi g) = (id xi g) o (/ k id), and 

• (id xi /) o (g x id) = {g k id) o (id xi /). 

For such a central / it makes sense to write / E g or g E / for these composites. 
Definition 6.3 

A symmetric premonoidal category is a binoidal category D together with an object 
I G D and natural isomorphisms with central components a : (X E Y) E Z —> 
IE(YE Z), A:/EAT—>X, p:XE7—>X and 7 : X E F -> YEI that obey 
the familiar coherence properties for monoidal categories. 

The non-bifunctoriality reflects the order of side-effects when we think of D as a 
category of ‘computations’. When we include a category C of ‘values’, we arrive at 
the notion of a Freyd category (Robinson & Power, 1997; Power & Thielecke, 1997; 
Levy et al., 2003). 

Definition 6.f 

A Freyd category consists of a symmetric premonoidal category D together with 
a category C with finite products, and an identity-on-objects functor J : C —» D 
which: 2 

• carries Cartesian products in C to premonoidal products in D on-the-nose: 
J(XxY)=X E Y, J(a) = a, J( A) = A, etc.; 

• preserves central maps. Since every morphism in C is central, this just means 
that every morphism in D of the form J(g ) is central. 

A Freyd category C —> D is called (locally) small if the category D is (locally) 
small. 


2 Such a functor J satisfying the two conditions is called a strict premonoidal functor in Definition 
8, (Power & Thielecke, 1997). In that paper the notion of Freyd category has not yet been given 
its name; still it is a central notion there and appears e.g. in Theorem 14. 
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Returning to the central construction of this section, the category C a of Defini¬ 
tion 6.1, observe that there is an identity-on-objects functor Ja : C —> C a whose 
action on morphisms is given by arr. This forms an instance of a Freyd category, 
as Theorem 6.1 will prove. We shall call this mapping A m» (C Ca) from arrows 
to Freyd categories the Kleisli construction for arrows. Although this name will 
be fully justified (2-categorically) in Section 6.3, we can observe now already some 
similarities to the Kleisli construction for monads. For an arrow A induced by a 
(co)monad, the associated Freyd category coincides with the (co)Kleisli cate¬ 
gory for the (co)monad in the usual sense. For the arrow (N , M) of (12), induced by 
both a monad M and a comonad N, the Kleisli construction yields what is called 
the bi-Kleisli category used e.g. in (Uustalu & Vene, 2005). 

The Kleisli construction A i—> (C -A C A ) turns out to be a bijective map from ar¬ 
rows to Freyd categories. This observation turns the oft-heard (informal) statement 
“arrows are Freyd categories”, into the following concrete theorem. 

Theorem 6.1 ( “Arrows are Freyd categories”) 

For a locally small category C with finite products, there is a one-to-one correspon¬ 
dence between arrows A over C (in the sense of Definition 4.2) and locally small 
Freyd categories C —» D. 

Proof 

Suppose we are given an arrow A : C op xC-t Set with operations arr, and 
ist. Putting D = C a entails that D is symmetric premonoidal by I = 1 € D and 
A KIT = X x Y. The premonoidal tensor IE extends to a functor (on morphisms) by 
virtue of the provided ist (or equivalently first, see Proposition 4.3, and second), 
since every morphism a € A(X, Y) yields a M Z = firstz{a) : XMZ and 

ZMa = secondz{a) : ZMX —> ZMY. The transformation of an arrow into a Freyd 
category is completed by defining J : C —> D to act as the identity on objects, and 
as arr on morphisms. 

Conversely, suppose given a Freyd category J : C —> D. Define A : C op xC—» Set 
by A(X, Y) = D(X, Y). This A is made into a monoid in Cat(C op x C, Set) by the 
unit arr = J : C(X, Y) —> D(A, Y), and for multiplication ^>> the composition 
A(X,P) x A(P,Y) —> A(X,Y) in D. Furthermore we can define internal strength 

istx.v : A(X,Y) A(X,Y x X) by ist x , Y (f) = (/ x X) o J«id,id}). 

Naturality of ist in Y is obvious, dinaturality in X boils down to the fact that the 
diagram 


D( A'. Y) — > D( X. 7HI) 



D(A / , Y) -—-x D(A', Y E X') 


commutes for every morphism g : X —> X' in C. The crux here is that it need 
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only commute for morphisms g of C, i.e. morphisms of D of the form J(g) (cf. 
equations (20) and (21)), which are central. Since one also readily checks (16)-(19), 
this proves that a Freyd category induces an arrow. □ 

The proof of the previous theorem reminds one strongly of the situation for 
monads. In the well-known correspondence between 

• monoids in the category of functors C —> C, 

• monads M on C, and 

• identity-on-objects functors J : C —* D that have a right adjoint, 

the functor J arises from M by the Kleisli construction, while J induces a monad 
M by the adjunction. The proof of the above theorem is a generalisation of this 
correspondence (Heunen & Jacobs, 2006). 


6.2 Eilenberg-Moore algebras for arrows 


After considering Kleisli constructions for arrows in the previous subsection, we 
now turn to the notion of Eilenberg-Moore algebras for arrows. We aim for two 
properties of this new notion. First, for arrows induced by (co)monads it should 
coincide with the usual notion of (co)algebra. Secondly, an arrow-algebra should be 
a retraction of a Kleisli category, much like for monads. 

Let us start by the situation for monads. We shall understand (Eilenberg-Moore) 
(co)algebras in 2-categorical style as natural transformations. Explicitly, an algebra 
for a monad (T, rj, g) on a category C is a map p : T => idc satisfying the familiar 
equations porj = id and poTp = pog. Since such a monad T is the same thing as 
a monoid in Cat(C, C), with monoidal structure given by functor composition and 
the identity functor, these monad equations boil down to the following commuting 
diagram. 


-T ® T = T 2 

I (p0ip=ipoT(p 


When T is strong we might as well require coherence with its strength. 


T(.) x H;^T((.) x (*)) 



(0 x (*) 


(30) 


The fact that an arrow is also a monoid - in a category of bifunctors - leads to 
the following definition. 


Definition 6.5 

Let A : C op xC-t Set be an arrow. An algebra for A is a natural transformation 
X : A => Horn that is compatible with arr , ;SS> and (first), in the sense that the 
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following diagrams commute for each ZgC. 



Horn 4^- Horn ® Horn Horn > Hom x , 


where we used the functor A x from Lemma 4.2 and the analogous Hom x ( X , Y ) = 
Hom(A xZ,YxZ). 


An algebra of an arrow is thus a (natural) mapping of computations to (pure) 
functions. One might have expected a single mapping x '■ A(X, Y) —> Horn (A. Y), 
but then it is unclear how to capture commutation with composition Specifi¬ 
cally, defining x ® X i n (31) is problematic. 

In elementary terms, an algebra x must thus satisfy the equations 

X(arr(f))=f, x(a »> b) = *(6) ° x(a), x(first(a)) = x(a) x id. 
Naturality then is a consequence: 

x(A(f,g)(a)) = x(arr(f) »> a »> arr(g)) 

= x(arr(g)) o x (a) o %(arr(/)) 

= 9° X(a) ° f 
= Horn (f,g)(x(a)). 

The rest of this subsection is devoted to results stemming from Definition 6.5. 
The first one concerns arrows M induced by monads M as in (10). This subsection 
contains two similar results. We write out the proof of this first one in full detail, 
to distinguish the trivial parts from the non-trivial ones. Especially the order in 
which to apply the equations in the verification of the multiplication law in the 
proof below is delicate. 


Proposition 6.1 

For a strong monad M there is a bijective correspondence between strong-monad- 
algebras M => id and arrow-algebras M => Horn. 


Proof 

Given a monad algebra ip : M => id, define tp : M => Horn on a € Horn (X,MY) 
by t P(x,Y)( a ) = <Py ° a. We check that it satisfies the required properties, omitting 
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subscripts for clarity. 

Tp(first z {a)) = cp o st o (a x Z) 

= {yxZ)o{axZ) 

= (ipo a) x Z) 

= tp(a) x Z , 

Tp{M{f,g){a)) = Tp{M{g)oaof) 

= <poM(g)oaof 
= goipoaof 
= Hom(/, g)((p o a) 

= Hom(/, g)(fp(a)). 

Conversely, given an arrow-algebra % : M => Horn we define \x '■ MX — * X 
as X(mx,x) (idMv)- This definition suggests that the Yoneda Lemma can also be 
used. For clarity, we have chosen to write out the proof that we get an M-algebra 
directly. The unit-law and naturality are easy: 


<p(arr(f)) =(por)of 
= /, 

Tp(a b) = ip o g, o M(b) o a 
= ipoM(<pob)oa 

= {ip O b) O {ip o a) 
= Tp(b)ojp(a), 


X°V = X(id) ° x{arr(r])) 

= x( arr ( , n) id) 

= X(M ° M(id) orjor]) 

= x(v) 

= x(arr(id)) 

= id, 


XoM(/)= X (id)o X (arr(M(/))) 

= X (arr(M(/))>»id) 

= ^oM(idHoM(/)) 
= x(M(f)) 

= x{^°M{r]o f) oid) 

= x(id »> arr(f)) 

= X(arr(f)) o x (id) 

= f°X- 


Compatibility (30) with strength is proved as follows. 

X x y = X(id) x Y = x(st o (id x id)) = x(st ° id) 
= x(id o st) ( = ) x(id) o st = x o st. 


The equality (*) holds because X is compatible with first, given by first(a) = 
st o (a x id); (**) uses the naturality of X - 

Verification of the multiplication law is more subtle. 


X o M(x) = x(id) ° x( arr (M(x))) = x(arr(M(x)) »> id) 

= X(M ° M (id) ° V = X(M{X)) = x(M ° M (v ° x) ° id) 

= X(arr(x) »> id) = x(id) ° xKr(x)) = x(id) ° x(id) 

= x(id »> id) = x(/* ° M(id) o id) = x(m) 

= x(M ° M ( id) or]og) = x(arr(n) id) 

= X(id) ° x(arr(g,)) =X° 
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The proof is completed by checking that the correspondence is indeed bijective: 
p=^(id) f(o)=.-^oo 

= <P ° id = x(id) o x (arr(a)) 

~¥ = x(arr(a) »> id) 

= x(P°M(id) or]oa) 

= x(a). □ 

There is a dual result for comonads. It shows that arrow-algebras form a common 
generalisation of monad algebras and comonad coalgebras. The proof is similar to 
the one above, and left to the reader. 

Proposition 6.2 

For a comonad N there is a bijective correspondence between comonad-coalgebras 
id => N and arrow-algebras N => Horn. □ 

The previous two propositions can be extended to bi-algebras. 

Proposition 6.3 

Let M be a strong monad, N a comonad, and A : NM =4> MN a distributive 
law between them. Then there is a bijective correspondence between A-bi-algebras 
M =>■ id => N and arrow-algebras (M, N) => Horn as in (12). 

Proof 

We shall only give the essentials, and leave details to the reader. Assuming a A- 
bialgebra M ==$■ id => N, the following diagram commutes by definition. 

M ---5- id 

V>M 

NM -— 

We obtain an arrow-algebra : ( M,N ) => Horn by (<p,ip)(a) = ip o a o if>. It 

satisfies the required equations. 

Conversely, an arrow-algebra x '■ (Af, N) => Horn induces a pair of maps x = 
(Xi,X 2 ) by 

X: = X(mx,x)(emx) ■ MX — >X 
X.2 = X(X,1wx)(Vnx) ■ X—* NX. 

Of the verification that it yields an appropriate A-bialgebra, we only show com¬ 
mutation of the above diagram, i.e. that we have a compatible algebra-coalgebra 
pair. 

Xi ° A o X 2 = X(e) ° X(arr( A)) o x (v) = x(v »> arr(X) »> e) 

= x([m ° M (v ° A O e) o A O N(f]) o 5] »> e) 

= x(hoA]»> £ ) = x(MoM( £ )oAoX( f| oA)oi) 

= xW=x(p°M( V )o\oN(s)o6) 

= X(£ »> V) = X(V) ° X( £ ) = X2 0 Xi • □ 
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The next Lemma shows that arrow algebras are retractions of Kleisli categories. 
Lemma 6.1 

An algebra for an arrow A on C is precisely a left inverse K : C a C of the 
“Kleisli inclusion” functor Ja ■ C —> C a- (A left inverse is sometimes also called a 
retraction, and means KJ = id.) 

Proof 

Given an algebra x '■ A=> Horn we get a functor Cm —> C by X i— * X and a i—> x( a )- 
It forms a retraction because x( arr (f)) = /• Conversely, a retraction K : C4 —> C 
yields an algebra K : A => Horn by oh K ( a). We check naturality: 

K(A(f,g)(a)) = K(arr(f) »> a »> arr(g)) 

= K(arr(g))oK(a)oK(arr(f)) 

= KJ(g)oK(a)oKJ(f) 

= g° K(a) o f_ 

= Hom (f,g)(K(a)). □ 

The previous Lemma justifies the term Eilenberg-Moore algebra for arrows, since 
the next Lemma gives an analogous characterisation for monads. 

Lemma 6.2 

For a monad M on a category C, there is a bijective correspondence between 

algebras M => id and retractions of the Kleisli inclusion J : C —> Cm- 

Proof 

Given an algebra : M => id, define a functor Tp : Cm —> C by X h X and 
/ h 1/3 o /. This clearly yields a functor, and a moreover a retraction: 

= Win 0 f) = p 0 v ° f = /■ 

Conversely, given a retraction K : Cm h C of J, we define K : M => id via 
K x = K{\(\ mx : MX —> X) : MX —> X. This yields a natural transformation, 
and a monad algebra: 

K x or] X = K( id) o KJ( V ) K x o M(K X ) = K x o K M x 

= K(n O Af(id) ogog) = K(id) O AT(id) 

= K(rj) = K(n o M (id) o id) 

= id) = 

= K(p, o M(id) o o /x) 

= K(id) o KJ(n ) 

= K x ogi. □ 


6.3 Freyd is Kleisli, for arrows 

For monads and comonads, the Kleisli construction is characterised 2-categorically 
as a certain left 2-adjoint (Street, 1972). Theorem 6.2 will prove that the (bijec¬ 
tive) mapping A h (C —> C 4) that we have been looking at allows a similar 
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2-categorical characterisation. Therefore the bijective mapping is justifiably called 
the Kleisli construction for arrows. This subsection will extend the notion of arrow 
on a category with finite products to arrows on Freyd categories in general, and 
studies some additional (2-categorical) properties. It assumes a reasonable level of 
familiarity with 2-categories; we refer to (Borceux, 1994a) for details. 

Let us first recall the situation for monads. The Kleisli construction is the left 
2-adjoint of the canonical “insertion” 2-functor Ins in the following 2-adjunction. 3 


Catf:: ^ T ~3 l^ Mnd ( Cat *)* (32) 

KJt 

Here the 2-category Mnd(Cat*)* is such that: 

• An object is a pair (C, M) of a category C and a monad M on it; 

• A 1-cell (H,o) : (C,M) —> (D ,M') is a pair of a functor H : C —> D and 
a natural transformation o : HM =>■ M'H, which is compatible with monad 
structures of M and M'. 


M i "ft Jif 


• A 2-cell a : (H , cr) => ( H', o'), is a natural transformation a : H => H' which 
is compatible with cr and o' in a suitable sense. 

The functor Ins is a canonical one mapping an object C to (C, id). The functor K2 
of the Kleisli construction maps an object (C , T) to the Kleisli category Cp. 

Let us go through similar 2-categorical motions for arrows. Denote by FPCat 
the 2-category of categories with finite products. At first, one may try for a functor 
K£ : Arrppcat — > FPCat for a suitably defined 2-category Arr F pcat of arrows, 4 
which maps (C, A) to C a- However, the category C a does not necessarily have finite 
products; it has only the weaker structure of a Freyd category. The same difficulty 
occurs already attempting to extend the 2-adjunction (32) to strong monads. The 
problem is resolved by considering arrows on Freyd categories. The 2-adjunction 


3 The notation Mnd(Cat*)* originates in (Street, 1972); see its Section 4. The operator (_)* 
on 2-categories opposes 1-cells (but not 2-cells). The constructor Mnd is actually a 2-functor 
which maps a 2-category C to the “2-category of monads” on C. 

4 We use the notation Arrppcat rather than Arr(FPCat). The notion of monad is defined in 
any 2-category C hence the notation Mnd(C) makes sense; whereas the notion of arrow does 
not come with such generality. 

Moreover, two *’s in Mnd(Cat*)* are gone in the corresponding ArrFPCat- The two *’s were 
there due to the choice of “lax” monad morphisms as 1-cells in Mnd(C) (which is convenient 
for the Eilenberg-Moore construction); to have “oplax” monad morphisms instead as 1-cells we 
needed two *’s. In defining the “category of arrows” Arrppcat there is no room for such choice 
between lax and oplax. For example, in the diagram (C 1) the 2-cell Hom(If) must be in this 
direction and not the other. 
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(32) for arrows then looks as follows. 


FreydA t ^ ^jArrFreyd (33) 

Kl 

The definition of arrows on Freyd categories is exactly the same as on categories 
with finite products, except for the conditions on first. Recall that in a Freyd 
category C -4 K, the category K has a premonoidal structure denoted by Kl. 

Definition 6.6 (Arrows on Freyd categories) 

An arrow on a Freyd category C -4 K is a monoid A 0 A ^ A *— Horn in the 
monoidal category [K op x K, Set] of bifunctors, equipped with morphisms 

firstx.Y.z : A(X, Y ) ~+. A{X MZ,YMZ) , 
that are natural in X, Y and dinatural in Z, and satisfy the following equations. 


first(a) arr(J(7Ti)) = arr(J(-K\)) ^> a (5’) 

first(a) ;§$> arr(id K J(/)) = arr (id K J(/)) first(a) (6’) 

first(first(a)) arr(a) = arr(a) ;§£> first(a) (7’) 

first(arr(g)) = arr(g K id) (8’) 

first(a b) = first(a) ^>> first(b) (9’) 


The conditions (5’)-(9’) correspond to (5)-(9) in the original definition. The 
equations (2)-(4) are already incorporated by the requirement that A be a monoid. 
Because J preserves premonoidal structure, the associativity isomorphisms a in 
(7’) are inherited from C as a K = J(a c ). Recalling the intuition that a morphism 
in C is a pure function while one in K is an effectful one, (6’) requires only pure 
functions to commute with first(a). 

For arrows on categories with finite products, Proposition 4.3 establishes the 
equivalence between the operations first and ist. This is also the case for arrows 
on Freyd categories, but here we prefer first. 

The ingredients of the adjunction (33) are defined straightforwardly, although 
they become lenghty when spelled out, and there are some hidden subtleties in the 
details. We merely sketch the definitions here, and refer to Appendix C for the 
details. 

The 2-categories Freyd and Arr Frey d are those of Freyd categories and arrows 
on Freyd categories, respectively. The 2-functor Ins carries an object C -4 K to the 
canonical Horn-arrow (C -4 K, HomK). The 2-functor Kl in the converse direction 
is essentially the Kleisli construction for arrows in Definition 6.1. Namely, an object 
(C -4 K, A) is mapped to a Freyd category C i K ^ K 4 . where K J -A K 4 is 
constructed like in Definition 6.1. 

Now we are ready to prove the (informal) claim “Freyd is Kleisli, for arrows”. 
Theorem 6.2 ( “Freyd is Kleisli”) 

There is a 2-adjunction Kl H Ins : Arr Frey d —> Freyd as in diagram (33). 
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Proof 

Its unit is given by (C -4 K, A) (C -4 K —i K^, Houlk a ), where t is the 

canonical natural transformation with components id : A(X, Y) —> K^(X, T). □ 

Arrows on categories with finite products also form a 2-category ArrFPCat, just 
like ArrFreyd- The obvious horizontal insertion 2-functors produce the following 
situation. 

ArrFreyd < -—-Arrppc'at 

'Mlm (34) 

Freyd 4- f||4^# PCat 

We conclude this section by elaborating this diagram. The following theorem gives 
its relation to the correspondence result of Theorem 6.1. 

Theorem 6.3 

The bijective correspondence of Theorem 6.1 between Freyd categories and arrows 
on categories with finite products extends to an isomorphism between 2-categories 
Freyd and ArrFPCat in an obvious way. 

Freyd) * ~~^ Arr F pcat □ 

Kl 

An intuition on an object (C -4 K, A) of ArrFreyd is that it has two different 
levels of extra computational structures added to C. One is described by the Freyd 
category C -4 K, and on top of it we have the other one expressed as the arrow 
A. But in fact, the additional expressive power that comes from having two infras¬ 
tructures is essentially redundant. This can be put in precise 2-categorical terms, 
for the details of which we refer to (Jacobs & Hasuo, 2006). 


7 Conclusion 

Arrows are powerful tools in functional programming. They provide compositional 
infrastructure, relieving the programmer of tedious bookkeeping, and in fact enable 
more general interfaces than monadic programming. 

The present article considered categorical denotational semantics for arrows. The 
pivotal point is Definition 4.2, characterising an arrow as a monoid in the category 
of bifunctors C op xC Set, that moreover has a structure called internal strength. 

This monoidal structure of arrows has been illustrated by several important real- 
world examples. Two of them were discussed leading up to the categorical definition 
in a way that does not require the arrow laws to be checked by hand. We have shown 
that a third language extension (biarrows) can be formulated elegantly using the 
provided semantics, indicating that they provide the right perspective and level of 
abstraction. 

Exploiting the similarity to monads then led to Kleisli and Eilenberg-Moore con¬ 
structions for arrows. The definitions have been supported by results analogous to 
that of (co)algebras for a (co)monad. 
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In fact, we have proven rigorously that the Kleisli construction for arrows cor¬ 
responds precisely to a Freyd category. This turns the folklore claim that “arrows 
are Freyd categories”, that has always remained informal, into a mathematically 
precise statement. The arrows-as-monoids perspective, however, is not so delicate 
as Freyd categories. Moreover it stresses the compositional infrastructure an arrow 
provides. 

Ultimately, as with any denotational semantics, this approach aids functional 
programmers in reasoning about their programs. For example, it facilitates prov¬ 
ing that the language extension induced by an arrow satisfies the desired domain- 
specific properties that initiated its design. 

An interesting topic that has not yet been elaborated is recursion schemes for 
arrows (Erkok & Launchbury, 2002; Benton & Hyland, 2003), that might find a 
more thorough theoretical foundation in the present work. 
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A Coends 


This appendix briefly recalls the notion of (parametrised) coends (for more infor¬ 
mation, see Mac Lane 1971, Section IX.6). This is then applied, as promised in 
section 4.4, to ensure that the category Cat(C op x C, V) has monoidal structure 
for suitable categories C and V. We specialise the category V later. 

A coend of a bifunctor A : C op x C —> V consists of an object V £ V and a 
universal dinatural cocone c : A =$■ V. Explicitly, a dinatural cocone c consists 
of morphisms cp : A(P,P) —> V for each P £ C such that, for each morphism 
f : P —> Q of C the following diagram commutes. 


A(idpJ)__^A(P,P)_ 


A(P,Q)Z 


Mf,idoT~^A(Q,Q)" 


Moreover c is universal in the sense that for every dinatural cocone e : A =$■ V' 
there is a unique mediating morphism g : V —> V' as follows. 



The object V, when it exists, is unique up to isomorphism. By abuse of language, it 
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is called the coend of A, and it is denoted by V = f P A(P, P). The fact that coend 
V does not depend on the ‘bound variable’ P makes the remark in section 4.1 that 
the parameter P is auxiliary more specific. 

We described for each P,Q £ C a coend as an object in V. The following lemma 
shows that they cooperate so as to form a functor, even when parametrised, as 
desired later. 

Lemma A.l 

Let V be a monoidal category, and suppose A, B : C op x C —> V are bifunctors 
such that for each X,Y £ C, the functor 

A(X,-)®B(-,y):CxC op -»V (Al) 

has a coend in V. Then these coends extend to a functor 

J A(—, P) 0 B(P, — ) : C op x C —> V. (A 2) 

Proof 

This is a special case of Theorem IX.7.2 in (Mac Lane, 1971). □ 

Given two bifunctors A, B : C op x C — * V, we would like to define their monoidal 
product A<S>B : C op x C —> V to be the coending bifunctor (A 2). For this we need 
all the coends of (A 1) to exist. The naturality of arr in Lemma 4.2 suggests that 
exponentiation should be the unit of the desired monoidal structure. This requires 
that C be V-enriched. This means that we assume objects C (X,Y) € V with 
suitable identity and composition morphisms T x : J v — 5 ► C(X,X) and C x ,y,z ■ 
C(X,Y) <gi C(Y. Z) —> C(X,Z). Moreover, we consider V-bifunctors instead of 
bifunctors, which means that we also have morphisms A^x t p),(Q,Y) '■ C(Q, X) ® 
C (P,Y) —> A(Q,Y) a ( x - p ) in V analogous to application of the bifunctor A. For 
more information, see (Borceux, 1994, Section 6.2; Kelly, 1982); another article with 
a lot of related information is (Cattani & Winskel, 2004). This requires V to have 
exponents (with respect to its tensors) and thus to be monoidal closed. 

Indeed, under these conditions, the above ideas combined with Lemma A.l pro¬ 
vide the desired monoidal structure, as the next proposition demonstrates. Its con¬ 
struction dates back to (Day, 1970). 

Proposition A.l 

Let V be a symmetric monoidal closed category, and C a V-enriched category. 
Suppose that all the coends of the functor (Al) exist. Then V-Cat(C op x C, V) 
is monoidal. 

Proof 

Due to the V-enrichedness of C and closedness of V we can define a V-bifunctor 
/ : C° p x C - V by 

I(X,Y) = C(X,Y) £ V 
whose action on morphisms, i.e. the morphism 

I(x,y U x',y') : C(X',X) $ C(Y,Y f ) - C {X',Y') C(X ’ Y) 
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in V, is the transpose of the iterated composition morphism 

C(X', X) 0 C(Y, Y') 0 C(X, Y) SC(I'X)® C(X, Y) 0 C(Y, Y') C{X\ Y'). 

Next, notice that Lemma A.l duly enriches over V (see Kelly, 1982, Section 
2.1), so that for V-bifunctors A,B : C op x C —> V we can define a V-bifunctor 
A 0 B : C op x C -♦ V by 

A®B = J A(-,P)®B(P,~). 

Recall that coend calculus is known to be associative up to isomorphism (Mac 
Lane, 1971, Proposition 9.8). So to show that the above are indeed a monoidal 
product and unit, it suffices to give natural isomorphisms A a '■ I ® A =$■ A and 
pA- A 0 1 => A. We concentrate on p for the purposes of the proof. (In fact, this is 
an instance of the enriched Yoneda lemma.) 

For each P G C we define a morphism ep : Jv —> A(X, Y) A(x ’ p '>® np ’ Y ) as the 
transpose of the following composite, where Jv is the monoidal unit of V. 

Iv <S> A(X, P ) 0 J(P, Y) A(X, P) 0 A(X, Y)^- p ) 

1 “ 

A(X, P) 0 J v 0 C(P, Y) - ld0Tx0ld -> A(X, P ) 0 C(X, X) 0 C(P, Y) 

These form a V-dinatural transformation e : A(X,—) 0 I(—,Y ) ==> A(X. Y). 
(The fact that the domain of ep is the monoidal unit in V is caused by the V- 
enrichedness of the (di)natural transformation.) Since A 0 I is a coend, there is a 
unique morphism p x ,Y : (A<g>I)(X,Y) —> A(X,Y) such that px,Y°cp = ep, where 
c : A(X, —) 0 /(—, Y) {A 0 I)(X, Y) is the coending dinatural transformation. 
Then p is a natural isomorphism. The natural transformation whose component 
Px'y : / v —> (A 0 I)(X, Y) a( - x ’ y ) at X, Y is the transpose of the composite 

J v 0 A(X, Y) m A(X, Y) X. Y) 0 C(Y, 0 I)(X, Y). 

is the inverse of px,Y , which shows that p is indeed a natural isomorphism, as 
required. □ 

To arrive at the monoidal structure of the previous proposition, we relied on the 
existence of all the coends of (Al). However, since we are only after a monoid in 
Cat(C op x C, V), it suffices to require the existence only of coends of the form 
J P A(X,P) x A(P,Y) for all A : C op x C -► C and X,Y e C. Recall that in 
section 4.4 we only needed C to be small. The previous observations lead to the 
following extension of this requirement. 

Definition A.l 

A category C is said to support arrows in a symmetric monoidal closed category 
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V if it is V-enriched, and for each V-bifunctor A : C op x C —> V and each pair 
X,Y eC the coend J P A(X, P) ® A(P, Y) exists. 

The previous machinery allows us to generalise our main definition, Definition 4.2. 
Definition A.2 

Let C be a category with finite products that supports arrows to V. An arrow over 
C is a monoid in V-Cat(C op x C, V) that carries an internal strength. 

Notable special cases of the previous definition are V = C Cartesian closed, and 

V = Set. The latter case reduces the situation to profunctors, which we studied in 
Section 4.4. The former one most closely resembles categorical semantics of Haskell, 
in that it concerns just one category of types and terms. But if C = V is to be 
Cartesian closed, small and cocomplete, then it is forced to be a preorder (Freyd, 
1964, Chapter 3, Exercise D). However, small complete internal categories do ex¬ 
ist (Hyland, 1988), and can indeed be used as models for polymorphic type theory. 
Working in such a universe is very similar to working in a polymorphic type theory 
as we have done in Section 4.4. Separating size issues is one of the reasons we have 
considered bifunctors to an enriching category V in this appendix. 


B Bicategorical characterisation 

Now that we have characterized arrows using categories enriched in a monoidal 
closed category in Appendix A, we may as well go one step further and give a unified 
characterisation of monads and arrows using categories enriched in a bicategory. 
As a bicategory is a 2-category in which composition is only associative up to 
isomorphism, this allows for the category of profunctors - after all, composition 
of profunctors depends on products in Set, that are not strictly associative. This 
approach cleanly exhibits the motto 

monad ^ Functor 
arrow Profunctor 

The definitions below clearly indicate that both arrows and monad are instances of 
monoids; the only difference is that one has to take the right category to base the 
monoid on. Finally, this unified approach gives an intuitive basis of Theorem 6.2. 

Definition B.l 

Let V be a bicategory, and V € V. By a monoid on V we mean a monoid in 
the monoidal category V(V,V), with the identity morphism and composition for 
monoidal structure. 

To justify this terminology, observe that, an (ordinary) monoid in a monoidal 
category C is a monoid in the corresponding one-object bicategory. 

Definition B.2 

Let C be a category enriched in V. A V-monad on C is a monoid on C in V-Cat. 
A V-arrow on C is a monoid on C in V-Prof. 
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For C a category, a Set-monad on C is simply an (ordinary) monad. Unwinding 
the definition, a Set-arrow A on C boils down to a monoid in Cat(C op x C, Set). 
Hence a Set-arrow of the previous definition closely resembles Definition 4.2 for the 
case V = Set, since the only thing missing is the (internal) strength. Equivalently, 
we can see A as an ‘index’, and speak of a category D with the same objects as C 
and with homsets D(X,Y) = A(X, Y) instead, in which identity and composition 
are given by the monoidal structure on A. Still another equivalent way of putting 
this is an identity-on-objects functor J : C —> D. Conversely, given a category D 
and an identity-on-objects functor J : C —> D we can reconstruct a Set-arrow A 
on C by A(X, Y ) = D(X, Y) and A(f, g) = Jg o (—) o Jf. This suggests that arrows 
over C should resemble identity-on-objects functors C —> D to a category D with 
the same objects as C, with added conditions corresponding to internal strength. 

To incorporate the internal strength restriction, consider the following definition. 

Definition B.3 

Let C be a category with finite products. Define a Cat(C op , Set)-enriched category 
self(C) by the same objects as C, and homobjects (self(C))(X, Y) = C((-)xI, Y). 

For a category C with finite products, a Cat(C op , Set)-monad on self(C) is an 
(ordinary) strong monad on C. Analogously, we can talk about Cat(C op , Set)- 
arrows on self(C) as ‘internally strong arrows over C’. These correspond to a Freyd 
category J : C —* D. 


C 2-categorical details in the Kleisli construction for arrows 

The 2-category Freyd of Freyd categories is defined in the following obvious way. 

• An object is a Freyd category C^K. 

• A 1-cell (F, H) : (C -4 K) -» (D 4 L) is a pair of a functor F : C -> D 
preserving finite products and a functor H : K —> L preserving premonoidal 
structures, such that IF = HJ. 

• A 2-cell (a, /?) : (F, H) =► (F', H') : (C -4 K) -► (D 4 L) is a pair of natural 
transformations a : F => F' and (3 : H => H' such that la = 0.J. 

The 2-category ArrFreyd of arrows on Freyd categories is as follows. 

• An object is a pair (C -4 K, A) of a Freyd category an arrow A on that. 

• A 1-cell (F, H, a) : (C -4 K, A) —► (D 4 L, B) is a 1-cell (F, H) : (C 4 
K) —> (D -4 L) of Freyd together with a natural transformation 

K op x K H ° VxH > L op x L 



Set 


which is compatible with arr, and first, in the following sense. 
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o • arr A = ( arr B o (H op x H)) • Hom(iJ). Here Hom(ff) is the following 
natural transformation induced by H’s action on morphisms. 



— a»^> A = (^> n o (H° p x H)) • (crQer), where the natural transformation 
<j ® <j is defined in the following obvious manner. 

(A 0 A)(X, Y) - _ + ( Bg B)(HX, HY) 


U PeC A(X, P) x A(P, Y) -4 Uq 6 d B(HX, Q ) x B(Q, HY) 

m P hp 

A(X,P) x A(P,f $i xg p0 (HX,HP) x B(HP,HY) 

Note that this construction of o 0 o : A0 A =$■ (B 0 B) o (iI op x H ) is 
not an instance of the functoriality of ®. 

— With first : for each X, Y, Z in C, 

A(X, Y) ---> B(HX, HY) 


A(X MZ,YMZ) ,fjfpYB(H(X H Z),H{Y H Z)) -B(HX IE HZ, HY E HZ) 

where the isomorphism is because H preserves premonoidal structures. 

• A 2-cell (a,0) : {F,H,o) => ( F',H',a ') : (C -4 K,A) -> (D 4 L, B) is a 
2-cell (a, 0) : (F, H) =>■ (F 1 , H') of Freyd which is compatible with a and o' 
in the following sense. 


H op xH' H op xH' 



(C 2) 


Here, note that a natural transformation 0 : H => H' : K —* L induces its 
dual 0 op : H ,op => H op : K op —> L op , with the direction of => reversed. 

The 2-functor Ins : Freyd —> Arrpreyd acts as follows. 

• An object C -4 K is mapped to (C -4 K,Hom K ). The bifunctor Hom K is 
obviously an arrow: its operation first comes from the premonoidal structure 

of K. 

• A 1-cell (F, H) is mapped to (F, H, Horn (if)). Compatibility of Horn (if) with 
first is because H preserves premonoidal structures. 

• A 2-cell (a,0) : ( F,H) => ( F',H' ) is mapped as it is. The compatibility of 0 
with Hom(if) and Hom(if') amounts to the naturality of 0 : H => H'. 
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The 2-functor KI : ArrFreyd —> Freyd is essentially the Kleisli construction for 
arrows in Definition 6.1. Namely, 

• An object (C -4 K, A) is mapped to a Freyd category C -4 K J -A K4, where 
K -4 K 4 is constructed like in Definition 6.1. The composition .74 o,/ is indeed 
a Freyd category: for example it preserves central morphisms essentially due 
to the arrow law (6’). 

• A 1-cell (F, H, a) : (C -4 K, A) -»• (D 4 L, B) induces a functor H : K4 —» 
L b such that: HX = HX on objects and Hf = <Jx,Y(f ) on morphisms. 

• A 2-cell (a, /?) is mapped to (a, /?), where a component dx is given by arr{px)- 
The naturality of $ amounts to the coherence condition (C2). 
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